home *** CD-ROM | disk | FTP | other *** search
- %case doChoice%
- %DoChoice%
- %case itemNr%
- %DefineItem%
- %case classDecl%
- %if not classname = superClass%
- /*----------*/
- class %classname% : public %superClass% {
- public:
- // instance variables:
- // methods:
- virtual pascal void Draw (Rect *area); // override
- #if qInspector
- virtual pascal void Fields (pascal void (*DoToField)
- (StringPtr fieldName,
- Ptr fieldAddr,
- short fieldType,
- void *DoToField_StaticLink),
- void *DoToField_StaticLink); // override
- #endif
- }; /* %classname% */
- %endif%
- %case gDeadStripSuppression%
- %StripSuppression%
- %case classMethods%
- %if not classname = superClass%
- #pragma segment ARes
- /*----------*/
- pascal void %classname%::Draw% %(Rect *area)
- {
- // put something here
- } /* Draw */
-
- %endif%
- %ClassMethods%
-